home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / boot / selector90.lha / Selector / pref / textforeground < prev    next >
Text File  |  1998-10-14  |  289b  |  17 lines
  1. getline env:selector.settings opa " textcol "
  2. chopword opa epa
  3. chopword opa epa
  4. chopword opa bg
  5.  
  6. if "$bg" EQ ""
  7.     setenv bg 0
  8. endif
  9.  
  10. selector >env:opa /pref/textfore.sel
  11.  
  12. if not "$opa" EQ ""
  13.     setenv epa "textcol $opa $bg"
  14.     changeline env:selector.settings epa " textcol "
  15. endif
  16.  
  17. unsetenv bg